﻿
Imports System.IO
Imports std
Imports xmlctrl

Public Class xmldefinition
    Inherits onelineXmlControl

    Protected Const __tagleading As String = Global.character.leftAngleBracket + Global.character.questionMark
    Protected Const __tagfinal As String = Global.character.questionMark + Global.character.rightAngleBracket

    Public Sub New(Optional ByVal buff As Stream = Nothing, Optional ByVal tag As String = Nothing)
        MyBase.New(buff, tag)
    End Sub

    Protected Overrides Function _tagleading() As String
        Return __tagleading
    End Function

    Protected Overrides Function _tagfinal() As String
        Return __tagfinal
    End Function

End Class
